﻿Imports DAL
Imports System.Linq

Public Class TestEmploye

    Dim bd As New BDCarpeDiemDataContext


    Private Sub TestEmploye_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        AddHandler UcTelephone1.modification, AddressOf modif
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Label1.BackColor = Me.BackColor

    End Sub

    Private Sub button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        
    End Sub

    Private Sub modif(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Label1.BackColor = IIf(sender, Color.Red, Me.BackColor)
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        MsgBox(DateTimePicker2.Value.Day.ToString + "/" + DateTimePicker2.Value.Month.ToString _
              + "/" + DateTimePicker2.Value.Year.ToString)


    End Sub
End Class